unit leixing_changliang;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils;

type
  wenjian_leixing = TextFile;
  pwenjian_leixing = ^wenjian_leixing;
  zichuan_leixing = string;
  pzichuan_leixing = ^zichuan_leixing;

const
  chenggong_changliang = 1;
  buchenggong_changliang = 0;

implementation

end.

